home *** CD-ROM | disk | FTP | other *** search
/ Sprite 1984 - 1993 / Sprite 1984 - 1993.iso / src / lib / c / netlib / RCS / Net_InetChecksum.c,v < prev    next >
Text File  |  1990-09-11  |  7KB  |  330 lines
  1. head     1.5;
  2. branch   ;
  3. access   ;
  4. symbols  ;
  5. locks    ; strict;
  6. comment  @ * @;
  7.  
  8.  
  9. 1.5
  10. date     90.09.11.14.43.46;  author kupfer;  state Exp;
  11. branches ;
  12. next     1.4;
  13.  
  14. 1.4
  15. date     89.08.03.15.35.15;  author jhh;  state Exp;
  16. branches ;
  17. next     1.3;
  18.  
  19. 1.3
  20. date     89.06.19.14.14.29;  author jhh;  state Exp;
  21. branches ;
  22. next     1.2;
  23.  
  24. 1.2
  25. date     89.03.23.10.17.10;  author brent;  state Exp;
  26. branches ;
  27. next     1.1;
  28.  
  29. 1.1
  30. date     88.11.21.09.10.15;  author mendel;  state Exp;
  31. branches ;
  32. next     ;
  33.  
  34.  
  35. desc
  36. @Formed from net.c of src/lib/old/net.c.
  37. @
  38.  
  39.  
  40. 1.5
  41. log
  42. @Lint.
  43. @
  44. text
  45. @/* 
  46.  * Net_InetChecksum.c --
  47.  *
  48.  *    Compute an internet checksum.
  49.  *
  50.  * Copyright 1987 Regents of the University of California
  51.  * All rights reserved.
  52.  * Permission to use, copy, modify, and distribute this
  53.  * software and its documentation for any purpose and without
  54.  * fee is hereby granted, provided that the above copyright
  55.  * notice appear in all copies.  The University of California
  56.  * makes no representations about the suitability of this
  57.  * software for any purpose.  It is provided "as is" without
  58.  * express or implied warranty.
  59.  */
  60.  
  61. #ifndef lint
  62. static char rcsid[] = "$Header: /sprite/src/lib/net/RCS/Net_InetChecksum.c,v 1.4 89/08/03 15:35:15 jhh Exp Locker: kupfer $ SPRITE (Berkeley)";
  63. #endif not lint
  64.  
  65.  
  66. #include "sprite.h"
  67. #include "net.h"
  68.  
  69. /*
  70.  *----------------------------------------------------------------------
  71.  *
  72.  * Net_InetChecksum --
  73.  *
  74.  *    Compute the 16-bit one's complement of the 1's complement sum of
  75.  *    of all words in the buffer.
  76.  *
  77.  *    Note: It is assumed that the length of the buffer is at most
  78.  *    128K bytes long. It also helps if the buffer is word-aligned.
  79.  *
  80.  * Results:
  81.  *    The 1's complement checksum in network byte-order.
  82.  *
  83.  * Side effects:
  84.  *    None.
  85.  *
  86.  *----------------------------------------------------------------------
  87.  */
  88.  
  89. unsigned short
  90. Net_InetChecksum(len, bufPtr)
  91.     register int len;        /* The number of bytes to checksum. */
  92.     Address bufPtr;        /* What to checksum. */
  93. {
  94.     register unsigned short *wordPtr = (unsigned short *) bufPtr;
  95.     register unsigned int sum = 0;
  96.  
  97.     
  98.     /*
  99.      * The basic algorithm 16-bit 1's complement addition is 
  100.      *  1) add the two unsigned 16-bit quantities, 
  101.      *  2) if there was a carry out of the high-order bit, 
  102.      *       it is added to the sum.
  103.      * To detect a carry out of the high-order bit, the sum is stored
  104.      * in a 32-bit word. As an optimization, we delay step 2 until
  105.      * all the words have been added together. At that point, the
  106.      * upper-half of the sum contains the sum of the carries from the
  107.      * additions. This value is then added to the lower half and if that
  108.      * operation causes a carry, then 1 is added to the sum.
  109.      *
  110.      * The optimization does place a limit on how many bytes can be
  111.      * summed without causing an overflow of the 32-bit sum. In the worst
  112.      * case, a maximum of 64K additions of 16-bit values can be added
  113.      * without overflow.
  114.      * 
  115.      * The summation is done in an unrolled loop. Once we have less than 
  116.      * 32 bytes to sum then it must be done in smaller loops.
  117.      */
  118.  
  119.     if (len == 20) {
  120.     sum += *wordPtr++;
  121.     sum += *wordPtr++;
  122.     sum += *wordPtr++;
  123.     sum += *wordPtr++;
  124.     sum += *wordPtr++;
  125.  
  126.     sum += *wordPtr++;
  127.     sum += *wordPtr++;
  128.     sum += *wordPtr++;
  129.     sum += *wordPtr++;
  130.     sum += *wordPtr++;
  131.     } else {
  132.     while (len >= 32) {
  133.         sum += *wordPtr++;
  134.         sum += *wordPtr++;
  135.         sum += *wordPtr++;
  136.         sum += *wordPtr++;
  137.  
  138.         sum += *wordPtr++;
  139.         sum += *wordPtr++;
  140.         sum += *wordPtr++;
  141.         sum += *wordPtr++;
  142.  
  143.         sum += *wordPtr++;
  144.         sum += *wordPtr++;
  145.         sum += *wordPtr++;
  146.         sum += *wordPtr++;
  147.  
  148.         sum += *wordPtr++;
  149.         sum += *wordPtr++;
  150.         sum += *wordPtr++;
  151.         sum += *wordPtr++;
  152.  
  153.         len -= 32;
  154.     }
  155.     while (len >= 2) {
  156.         sum += *wordPtr++;
  157.         len -= 2;
  158.     }
  159.  
  160.     if (len == 1) {
  161. #if BYTE_ORDER == LITTLE_ENDIAN
  162.         sum += (*wordPtr) & 0x00ff;
  163. #else
  164.         sum += (*wordPtr) & 0xff00;
  165. #endif
  166.     }
  167.     }
  168.  
  169.     /*
  170.      * The most signficant bits of "sum" contains the carries from
  171.      * the overflow of the summing. Add this overflow back into
  172.      * the least significant 16 bits of the sum and do it a second
  173.      * time in case there's a carry from the first time.
  174.      */
  175.     if (sum > 0xffff) {
  176. #if 0
  177.     extern int main_Debug, tcp_out;
  178.  
  179.     if (tcp_out && main_Debug) {
  180.         fprintf(stderr, "Checksum 1: %x\n", sum);
  181.     }
  182. #endif /* 0 */
  183.  
  184.     sum = ((sum >> 16) & 0xffff) + (sum & 0xffff);
  185.     /*
  186.      * See if there was a carry from the addition. The overflow will
  187.      * be at most 1.
  188.      */
  189. #if 0
  190.     if (tcp_out && main_Debug) {
  191.         fprintf(stderr, "Checksum 2: %x\n", sum);
  192.     }
  193. #endif /* 0 */
  194.     if (sum > 0xffff) {
  195.         sum++;
  196.     }
  197.     }
  198.  
  199.     return((~sum & 0xffff));
  200. }
  201.  
  202. @
  203.  
  204.  
  205. 1.4
  206. log
  207. @version 1.3 causes problems with the sun4 dbg module. since no one uses
  208. odd aligned buffers anyway we'll go back to version 1.2
  209.  
  210. @
  211. text
  212. @d18 1
  213. a18 1
  214. static char rcsid[] = "$Header: /sprite/src/lib/net/RCS/Net_InetChecksum.c,v 1.2 89/03/23 10:17:10 brent Exp Locker: jhh $ SPRITE (Berkeley)";
  215. d132 1
  216. a134 1
  217.     /*
  218. d138 2
  219. a139 1
  220.     */
  221. d145 1
  222. a145 1
  223.     /*
  224. d149 1
  225. a149 1
  226.     */
  227. @
  228.  
  229.  
  230. 1.3
  231. log
  232. @Allow buffers to be odd-aligned
  233. @
  234. text
  235. @d18 1
  236. a18 1
  237. static char rcsid[] = "$Header: /sprite/src/lib/net/RCS/Net_InetChecksum.c,v 1.2 89/03/23 10:17:10 brent Exp $ SPRITE (Berkeley)";
  238. a23 1
  239.  
  240. a44 1
  241.  
  242. d53 1
  243. a53 7
  244.     union {
  245.     unsigned char    c[2];        /* data as bytes */
  246.     unsigned short    s;        /* data as a word */
  247.     } convert;
  248.  
  249.     Boolean oddAligned = FALSE;
  250.  
  251. a72 9
  252.      *
  253.      * If the buffer is odd aligned we need to align it first. Save the
  254.      * first byte and move the pointer over one. Then do all the sums
  255.      * a word at a time. Since we aligned the pointer the bytes in the
  256.      * word will be reversed from the aligned case. That's why the saved
  257.      * byte is in the 2nd character of the union. If the buffer is an
  258.      * odd number of bytes long we store that byte in the first character.
  259.      * Then add in the saved characters. Before we return the sum we have
  260.      * to swap the bytes into the correct order.
  261. a74 8
  262.     convert.s = 0;
  263.  
  264.     if (((int) bufPtr & 1)) {
  265.     convert.c[1] = *(unsigned char *) wordPtr;
  266.     wordPtr = (unsigned short *) ((char *) wordPtr + 1);
  267.     oddAligned = TRUE;
  268.     len -= 1;
  269.     }
  270. a114 1
  271.     }
  272. d116 7
  273. a122 2
  274.     if (len == 1) {
  275.     convert.c[0] = *((unsigned char *) wordPtr);
  276. a123 1
  277.     sum += convert.s;
  278. a151 3
  279.     }
  280.     if (oddAligned) {
  281.     sum = (sum >> 8) | ((sum & 0xff) << 8);
  282. @
  283.  
  284.  
  285. 1.2
  286. log
  287. @Fixed LITTLE_ENDIAN check.  It has to be
  288. #if BYTE_ORDER == LITTLE_ENDIAN
  289. and it cannot be
  290. #ifdef LITTLE_ENDIAN
  291. @
  292. text
  293. @d18 1
  294. a18 1
  295. static char rcsid[] = "$Header: /sprite/src/lib/net/RCS/Net_InetChecksum.c,v 1.1 88/11/21 09:10:15 mendel Exp $ SPRITE (Berkeley)";
  296. d24 1
  297. d46 1
  298. d55 7
  299. a61 1
  300.     
  301. d81 9
  302. d92 8
  303. d140 1
  304. d142 2
  305. a143 7
  306.     if (len == 1) {
  307. #if BYTE_ORDER == LITTLE_ENDIAN
  308.         sum += (*wordPtr) & 0x00ff;
  309. #else
  310.         sum += (*wordPtr) & 0xff00;
  311. #endif
  312.     }
  313. d145 1
  314. d174 3
  315. @
  316.  
  317.  
  318. 1.1
  319. log
  320. @Initial revision
  321. @
  322. text
  323. @d18 1
  324. a18 1
  325. static char rcsid[] = "$Header: net.c,v 2.0 87/08/11 09:34:20 brent Exp $ SPRITE (Berkeley)";
  326. d117 1
  327. a117 1
  328. #ifdef LITTLE_ENDIAN
  329. @
  330.